home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 8 / CD Funhouse Version 8.0 - Wayzata Technology (7013) (1993).iso / pc / mac / __intere / cartoon_.sf2 / card_2941.txt < prev    next >
Text File  |  1989-08-01  |  13KB  |  537 lines
  1. -- card: 2941 from stack: in.sf2
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2687
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 8000
  11. -- rect: left=9 top=114 right=168 bottom=107
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 21493 / 21493
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: And your little dog
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   get the name of me
  23.   delete word 1 of it
  24.   delete word 1 of it
  25.   put it into myname
  26.   put "PLAY" && myname into myname
  27.   set hilite of me to TRUE
  28.   do myname
  29.   wait until the sound is "done"
  30.   set hilite of me to FALSE
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 2 (button)
  36. -- low flags: 00
  37. -- high flags: 8000
  38. -- rect: left=107 top=114 right=168 bottom=205
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 21493 / 21493
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: Auntie Em?
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   get the name of me
  50.   delete word 1 of it
  51.   delete word 1 of it
  52.   put it into myname
  53.   put "PLAY" && myname into myname
  54.   set hilite of me to TRUE
  55.   do myname
  56.   wait until the sound is "done"
  57.   set hilite of me to FALSE
  58. end mouseUp
  59.  
  60.  
  61.  
  62. -- part 3 (button)
  63. -- low flags: 00
  64. -- high flags: 8000
  65. -- rect: left=204 top=114 right=168 bottom=302
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 21493 / 21493
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: Bayoop
  74. ----- HyperTalk script -----
  75. on mouseUp
  76.   get the name of me
  77.   delete word 1 of it
  78.   delete word 1 of it
  79.   put it into myname
  80.   put "PLAY" && myname into myname
  81.   set hilite of me to TRUE
  82.   do myname
  83.   wait until the sound is "done"
  84.   set hilite of me to FALSE
  85. end mouseUp
  86.  
  87.  
  88.  
  89. -- part 4 (button)
  90. -- low flags: 00
  91. -- high flags: 8000
  92. -- rect: left=302 top=114 right=168 bottom=400
  93. -- title width / last selected line: 0
  94. -- icon id / first selected line: 21493 / 21493
  95. -- text alignment: 1
  96. -- font id: 0
  97. -- text size: 12
  98. -- style flags: 0
  99. -- line height: 16
  100. -- part name: Bike bell
  101. ----- HyperTalk script -----
  102. on mouseUp
  103.   get the name of me
  104.   delete word 1 of it
  105.   delete word 1 of it
  106.   put it into myname
  107.   put "PLAY" && myname into myname
  108.   set hilite of me to TRUE
  109.   do myname
  110.   wait until the sound is "done"
  111.   set hilite of me to FALSE
  112. end mouseUp
  113.  
  114.  
  115.  
  116. -- part 5 (button)
  117. -- low flags: 00
  118. -- high flags: 8000
  119. -- rect: left=400 top=114 right=168 bottom=498
  120. -- title width / last selected line: 0
  121. -- icon id / first selected line: 21493 / 21493
  122. -- text alignment: 1
  123. -- font id: 0
  124. -- text size: 12
  125. -- style flags: 0
  126. -- line height: 16
  127. -- part name: Get out of here
  128. ----- HyperTalk script -----
  129. on mouseUp
  130.   get the name of me
  131.   delete word 1 of it
  132.   delete word 1 of it
  133.   put it into myname
  134.   put "PLAY" && myname into myname
  135.   set hilite of me to TRUE
  136.   do myname
  137.   wait until the sound is "done"
  138.   set hilite of me to FALSE
  139. end mouseUp
  140.  
  141.  
  142.  
  143. -- part 6 (button)
  144. -- low flags: 00
  145. -- high flags: 8000
  146. -- rect: left=9 top=167 right=221 bottom=107
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 21493 / 21493
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name: Hubba
  155. ----- HyperTalk script -----
  156. on mouseUp
  157.   get the name of me
  158.   delete word 1 of it
  159.   delete word 1 of it
  160.   put it into myname
  161.   put "PLAY" && myname into myname
  162.   set hilite of me to TRUE
  163.   do myname
  164.   wait until the sound is "done"
  165.   set hilite of me to FALSE
  166. end mouseUp
  167.  
  168.  
  169.  
  170. -- part 7 (button)
  171. -- low flags: 00
  172. -- high flags: 8000
  173. -- rect: left=107 top=167 right=221 bottom=205
  174. -- title width / last selected line: 0
  175. -- icon id / first selected line: 21493 / 21493
  176. -- text alignment: 1
  177. -- font id: 0
  178. -- text size: 12
  179. -- style flags: 0
  180. -- line height: 16
  181. -- part name: I cant go
  182. ----- HyperTalk script -----
  183. on mouseUp
  184.   get the name of me
  185.   delete word 1 of it
  186.   delete word 1 of it
  187.   put it into myname
  188.   put "PLAY" && myname into myname
  189.   set hilite of me to TRUE
  190.   do myname
  191.   wait until the sound is "done"
  192.   set hilite of me to FALSE
  193. end mouseUp
  194.  
  195.  
  196.  
  197. -- part 8 (button)
  198. -- low flags: 00
  199. -- high flags: 8000
  200. -- rect: left=204 top=167 right=221 bottom=302
  201. -- title width / last selected line: 0
  202. -- icon id / first selected line: 21493 / 21493
  203. -- text alignment: 1
  204. -- font id: 0
  205. -- text size: 12
  206. -- style flags: 0
  207. -- line height: 16
  208. -- part name: I'll get you
  209. ----- HyperTalk script -----
  210. on mouseUp
  211.   get the name of me
  212.   delete word 1 of it
  213.   delete word 1 of it
  214.   put it into myname
  215.   put "PLAY" && myname into myname
  216.   set hilite of me to TRUE
  217.   do myname
  218.   wait until the sound is "done"
  219.   set hilite of me to FALSE
  220. end mouseUp
  221.  
  222.  
  223.  
  224. -- part 9 (button)
  225. -- low flags: 00
  226. -- high flags: 8000
  227. -- rect: left=302 top=167 right=221 bottom=400
  228. -- title width / last selected line: 0
  229. -- icon id / first selected line: 21493 / 21493
  230. -- text alignment: 1
  231. -- font id: 0
  232. -- text size: 12
  233. -- style flags: 0
  234. -- line height: 16
  235. -- part name: Kiss
  236. ----- HyperTalk script -----
  237. on mouseUp
  238.   get the name of me
  239.   delete word 1 of it
  240.   delete word 1 of it
  241.   put it into myname
  242.   put "PLAY" && myname into myname
  243.   set hilite of me to TRUE
  244.   do myname
  245.   wait until the sound is "done"
  246.   set hilite of me to FALSE
  247. end mouseUp
  248.  
  249.  
  250.  
  251. -- part 10 (button)
  252. -- low flags: 00
  253. -- high flags: 8000
  254. -- rect: left=400 top=167 right=221 bottom=498
  255. -- title width / last selected line: 0
  256. -- icon id / first selected line: 21493 / 21493
  257. -- text alignment: 1
  258. -- font id: 0
  259. -- text size: 12
  260. -- style flags: 0
  261. -- line height: 16
  262. -- part name: Scream
  263. ----- HyperTalk script -----
  264. on mouseUp
  265.   get the name of me
  266.   delete word 1 of it
  267.   delete word 1 of it
  268.   put it into myname
  269.   put "PLAY" && myname into myname
  270.   set hilite of me to TRUE
  271.   do myname
  272.   wait until the sound is "done"
  273.   set hilite of me to FALSE
  274. end mouseUp
  275.  
  276.  
  277.  
  278. -- part 11 (button)
  279. -- low flags: 00
  280. -- high flags: 8000
  281. -- rect: left=9 top=220 right=274 bottom=107
  282. -- title width / last selected line: 0
  283. -- icon id / first selected line: 21493 / 21493
  284. -- text alignment: 1
  285. -- font id: 0
  286. -- text size: 12
  287. -- style flags: 0
  288. -- line height: 16
  289. -- part name: Top Cat
  290. ----- HyperTalk script -----
  291. on mouseUp
  292.   get the name of me
  293.   delete word 1 of it
  294.   delete word 1 of it
  295.   put it into myname
  296.   put "PLAY" && myname into myname
  297.   set hilite of me to TRUE
  298.   do myname
  299.   wait until the sound is "done"
  300.   set hilite of me to FALSE
  301. end mouseUp
  302.  
  303.  
  304.  
  305. -- part 12 (button)
  306. -- low flags: 00
  307. -- high flags: 8000
  308. -- rect: left=107 top=220 right=274 bottom=205
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 21493 / 21493
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: We're not in Kansas
  317. ----- HyperTalk script -----
  318. on mouseUp
  319.   get the name of me
  320.   delete word 1 of it
  321.   delete word 1 of it
  322.   put it into myname
  323.   put "PLAY" && myname into myname
  324.   set hilite of me to TRUE
  325.   do myname
  326.   wait until the sound is "done"
  327.   set hilite of me to FALSE
  328. end mouseUp
  329.  
  330.  
  331.  
  332. -- part 13 (button)
  333. -- low flags: 00
  334. -- high flags: 8000
  335. -- rect: left=204 top=220 right=274 bottom=302
  336. -- title width / last selected line: 0
  337. -- icon id / first selected line: 21493 / 21493
  338. -- text alignment: 1
  339. -- font id: 0
  340. -- text size: 12
  341. -- style flags: 0
  342. -- line height: 16
  343. -- part name: Witch laugh
  344. ----- HyperTalk script -----
  345. on mouseUp
  346.   get the name of me
  347.   delete word 1 of it
  348.   delete word 1 of it
  349.   put it into myname
  350.   put "PLAY" && myname into myname
  351.   set hilite of me to TRUE
  352.   do myname
  353.   wait until the sound is "done"
  354.   set hilite of me to FALSE
  355. end mouseUp
  356.  
  357.  
  358.  
  359. -- part 14 (button)
  360. -- low flags: 00
  361. -- high flags: 8000
  362. -- rect: left=302 top=220 right=274 bottom=400
  363. -- title width / last selected line: 0
  364. -- icon id / first selected line: 21493 / 21493
  365. -- text alignment: 1
  366. -- font id: 0
  367. -- text size: 12
  368. -- style flags: 0
  369. -- line height: 16
  370. -- part name: Witch music
  371. ----- HyperTalk script -----
  372. on mouseUp
  373.   get the name of me
  374.   delete word 1 of it
  375.   delete word 1 of it
  376.   put it into myname
  377.   put "PLAY" && myname into myname
  378.   set hilite of me to TRUE
  379.   do myname
  380.   wait until the sound is "done"
  381.   set hilite of me to FALSE
  382. end mouseUp
  383.  
  384.  
  385.  
  386. -- part 15 (button)
  387. -- low flags: 00
  388. -- high flags: 8000
  389. -- rect: left=400 top=220 right=274 bottom=498
  390. -- title width / last selected line: 0
  391. -- icon id / first selected line: 21493 / 21493
  392. -- text alignment: 1
  393. -- font id: 0
  394. -- text size: 12
  395. -- style flags: 0
  396. -- line height: 16
  397. -- part name: Woody
  398. ----- HyperTalk script -----
  399. on mouseUp
  400.   get the name of me
  401.   delete word 1 of it
  402.   delete word 1 of it
  403.   put it into myname
  404.   put "PLAY" && myname into myname
  405.   set hilite of me to TRUE
  406.   do myname
  407.   wait until the sound is "done"
  408.   set hilite of me to FALSE
  409. end mouseUp
  410.  
  411.  
  412.  
  413. -- part 16 (button)
  414. -- low flags: 00
  415. -- high flags: A004
  416. -- rect: left=96 top=278 right=334 bottom=167
  417. -- title width / last selected line: 0
  418. -- icon id / first selected line: 32670 / 32670
  419. -- text alignment: 1
  420. -- font id: 0
  421. -- text size: 12
  422. -- style flags: 0
  423. -- line height: 16
  424. -- part name: Play 'em all
  425. ----- HyperTalk script -----
  426. on mouseUp
  427.   repeat with count=1 to 15
  428.     get the location of button count
  429.     click at it
  430.     wait until the sound is "done"
  431.   end repeat
  432. end mouseUp
  433.  
  434.  
  435.  
  436. -- part 17 (button)
  437. -- low flags: 00
  438. -- high flags: A004
  439. -- rect: left=166 top=278 right=334 bottom=237
  440. -- title width / last selected line: 0
  441. -- icon id / first selected line: 14767 / 14767
  442. -- text alignment: 1
  443. -- font id: 0
  444. -- text size: 12
  445. -- style flags: 0
  446. -- line height: 16
  447. -- part name: About sfx...
  448. ----- HyperTalk script -----
  449. on mouseUp
  450.   play "Hubba"
  451.   show card field "About"
  452. end mouseUp
  453.  
  454.  
  455.  
  456. -- part 18 (button)
  457. -- low flags: 00
  458. -- high flags: A004
  459. -- rect: left=236 top=278 right=334 bottom=307
  460. -- title width / last selected line: 0
  461. -- icon id / first selected line: 14130 / 14130
  462. -- text alignment: 1
  463. -- font id: 0
  464. -- text size: 12
  465. -- style flags: 0
  466. -- line height: 16
  467. -- part name: Home
  468. ----- HyperTalk script -----
  469. on mouseUp
  470.   play "Bayoop"
  471.   wait until the sound is "done"
  472.   visual scroll left to gray
  473.   visual checkerboard to black
  474.   visual barn door open to gray
  475.   visual venetian blinds to white
  476.   visual iris close to inverse
  477.   visual wipe right
  478.   go home
  479. end mouseUp
  480.  
  481.  
  482.  
  483. -- part 19 (button)
  484. -- low flags: 00
  485. -- high flags: A004
  486. -- rect: left=369 top=278 right=333 bottom=440
  487. -- title width / last selected line: 0
  488. -- icon id / first selected line: 1019 / 1019
  489. -- text alignment: 1
  490. -- font id: 0
  491. -- text size: 12
  492. -- style flags: 0
  493. -- line height: 16
  494. -- part name: Install snds...
  495. ----- HyperTalk script -----
  496. on mouseUp
  497.   hide card field "About"
  498.   play "Auntie Em?"
  499.   answer "Notice: the ResCopy XCMD is Copyrighted.." with "Continue"
  500.   answer "..by Apple Computer and may not be sold..." with "Continue"
  501.   answer "... for money." with "Cancel" or "ResCopy"
  502.   if it is "Cancel" then exit mouseUp
  503.   ResCopy
  504. end mouseUp
  505.  
  506.  
  507.  
  508. -- part 20 (field)
  509. -- low flags: 81
  510. -- high flags: 0002
  511. -- rect: left=12 top=77 right=334 bottom=498
  512. -- title width / last selected line: 0
  513. -- icon id / first selected line: 0 / 0
  514. -- text alignment: 0
  515. -- font id: 3
  516. -- text size: 9
  517. -- style flags: 0
  518. -- line height: 12
  519. -- part name: About
  520. ----- HyperTalk script -----
  521. on mouseUp
  522.   play "Kiss"
  523.   hide card field "About"
  524. end mouseUp
  525.  
  526.  
  527.  
  528. -- part contents for card part 20
  529. ----- text -----
  530. This stack contains 15 HyperCard snd resources which you may move to your own stacks, to your Home stack, or to your copy of the HyperCard application. They may be made to sound with the HyperTalk PLAY command, which is described in the HyperCard Help stacks and in Danny Goodman's book. You may use Apple Computer's ResCopy XCMD, which is installed in this stack, to move these snd resources to your stacks -- press the "Install snds..." button in the lower right hand corner. If you are not familiar with the Font/DA mover interface or with pop-up menus, you are advised against using ResCopy. ResCopy is by Steve Maller, is ¬© by Apple Computer, and may not be sold for money.
  531.  
  532. This stack is CARDWARE. If you use any one of these snds, or if you wish to express righteous indignation over any aspect of the current glut in available yogurt flavors, you are obligated to send a picture postcard of your hometown to me: David Rakowski, 60 Gorham Ave. #6, Brookline, MA 02146. These snd resources and this stack are ¬© by me (urp).
  533.  
  534. This stack is dedicated to John Anderson of the Acme Dot Company, for no other reason than the fact that I like the "HyperFont" that he designed and GAVE AWAY. I don't use it, but I like it.
  535.  
  536. Other sfx stacks created by me (blush) are available from user groups and public domain outlets such as BudgetBytes (1-800-356-3551 for orders, 913-271-6022 for information -- I have ordered from them and they are quite good). There are currently (March 23, 1988) 18 numbered sfx stacks, 5 Monty Python stacks, 3 cartoon sfx stacks, and two others. Please do not send requests for copies of these other stacks to me.
  537.